Top 10k strings from Roulette (1982)(Stefan Freise).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /

Back to the directory listing

   2 y(n,ch,q)=q*3
   2 WIN : stake x 8
   2 ;"ROULETTE"
   2 (chiph,chipb)-56
   1 ~ shows where you can put your chip and the win-  ning numbers are underlined":
   1 z$="ROULETTE":
   1 y(n,m,b)=z(c)
   1 y(n,ch,q)=q:
   1 y(n,ch,q)=q+24
   1 y(n,ch,q)=q+12
   1 g(n)=g(n)-wert
   1 g(n)=g(n)+y(n,m,13
   1 chiph=chiph+(k$="6")-(k$="7"):
   1 chiph,chipb;c$:
   1 chiph,chipb;c$
   1 chipb=chipb+(k$="8")-(k$="5")
   1 a$=a$+a$+a$+a$
   1 a$=" 0  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 "
   1 WIN : stake x 5
   1 WIN : stake x 35
   1 WIN : stake x 2
   1 WIN : stake x 17
   1 WIN : stake x 11
   1 WIN : stake x 1
   1 TEROULETTE
   1 ROULETTEROULETTEROULETTEROULETTEROULETTEROULETTEROULETTEROULETTE
   1 Initialisierung
   1 CURSOR KEYS
   1 ;a$((n-from)
   1 ;"using the 
   1 ;"uneven numbers"
   1 ;"third dozen "
   1 ;"second dozen"
   1 ;"red numbers "
   1 ;"first dozen"
   1 ;"even numbers  "
   1 ;"black numbers"
   1 ;"This symbol ~
   1 ;"Sorry, but you haven't got any  more money
   1 ;"Please move your chip Player ";n:
   1 ;"O 2 5 8 
   1 ;"Nobody has got anymore money":
   1 ;"MANQUE";
   1 ;"IMPAIR";
   1 ;"IMPAIR":
   1 ;"How many rounds do you want to  play 
   1 ;"How many rounds do you want to  continue ?
   1 ;"How many players 
   1 ;"Do you want to see the rules    before you play 
   1 ;"9...set chip  0...set last chip " :
   1 , Press:  ~c~ to continue
   1 (n-from)+31
   1 "How mouch $ is this chip ? ";wert
   1  ~s~ to start again
   1  ~e~ to exit
   1  mesdames et messieurs
   1  STOP THE TAPE 
   1  Rien ne va plus
   1  Rien ne  
   1  PLEASE WAIT !!! 
   1  LAS VEGAS
   1  I am Rockefeller
   1  Faites votre jeu,
   1  EXAMPLE !!!":
   1  CASINO ROYAL
   1  1982 Stefan Freise
   1  (y/n) : ";
   1  (1-4) : ";
   1   ROULETTE
   1   Gymnasium Rietberg